#pragma once
#include <iostream>
#include <string>
#include <cerrno>
#include <cstring>
#include <cstdlib>
#include <signal.h>
#include <sys/wait.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <pthread.h>

static void service(int sock,const std::string &ip,const uint16_t &port)
{
    char buffer[1024];
    memset(buffer,0,sizeof(buffer));

    while(true)
    {
        // 读取数据
        ssize_t n=read(sock,buffer,sizeof(buffer)-1);
        if(n>0)
        {
            buffer[n]='\0';
            std::cout<<ip<<":"<<port<<"# "<<buffer<<std::endl;
        }
        else if(n==0)
        {
            std::cout<<"reader shutdown "<<ip<<":"<<port<<std::endl;
            break;
        }
        else
        {
            fprintf(stdout,"read error %d:%s\n",errno,strerror(errno));
            break;
        }
        // 写会数据
        write(sock,buffer,strlen(buffer));
    }

    close(sock);
}

class ServerTCP
{
private:
    const static int backlog=20;

    class ThreadData
    {
    public:
        uint16_t _port;
        int _sock;
        std::string _ip;
    };

    static void *threadStack(void *args)
    {
        pthread_detach(pthread_self());
        ThreadData *ptd=static_cast<ThreadData *>(args);
        service(ptd->_sock,ptd->_ip,ptd->_port);

        delete ptd;
        return nullptr;
    }

private:
    int _listenSock;
    uint16_t _port;
    std::string _ip;
public:
    ServerTCP(uint16_t port,const std::string &ip="")
        :_listenSock(0),_port(port),_ip(ip)
    {}

    void init()
    {
        // 1.创建套接字
        _listenSock=socket(AF_INET,SOCK_STREAM,0);
        if(_listenSock<0)
        {
            fprintf(stdout,"socket error %d:%s\n",errno,strerror(errno));
            exit(2);
        }
        std::cout<<"socket success"<<std::endl;

        // 2.进行bind
        struct sockaddr_in local;
        memset((void *)&local,0,sizeof(local));

        local.sin_family=AF_INET;
        local.sin_port=htons(_port);
        local.sin_addr.s_addr=_ip.empty()?INADDR_ANY:inet_addr(_ip.c_str());

        if(bind(_listenSock,(struct sockaddr *)&local,sizeof(local))<0)
        {
            fprintf(stdout,"bind error %d:%s\n",errno,strerror(errno));
            //close(_listenSock);
            exit(3);
        }
        std::cout<<"bind success"<<std::endl;

        // 3.将_serviceSock设置为监听状态
        if(listen(_listenSock,backlog)<0)
        {
            fprintf(stdout,"listen error %d:%s\n",errno,strerror(errno));
            //close(_listenSock);
            exit(4);
        }
        std::cout<<"listen success"<<std::endl;

    }

    void start()
    {
        //signal(SIGCHLD,SIG_IGN); // 手动设置为忽略,让子进程自己回收自己

        while(true)
        {
            // 获取连接
            struct sockaddr_in src;
            socklen_t srclen=sizeof(src);

            int serviceSock=accept(_listenSock,(struct sockaddr *)&(src),&srclen);
            if(serviceSock<0)
            {
                fprintf(stdout,"accept error %d:%s\n",errno,strerror(errno));
                continue;
            }

            // 分析src
            std::string srcip=inet_ntoa(src.sin_addr);
            uint16_t srcport=ntohs(src.sin_port);

            // version3:创建线程来完成service
            pthread_t tid;

            ThreadData *ptd=new ThreadData();
            ptd->_port=srcport;
            ptd->_sock=serviceSock;
            ptd->_ip=srcip;

            pthread_create(&tid,nullptr,threadStack,ptd);

            // version2:创建子进程及孙子进程,让孙子进程进行service而且让1号进程领养
            // pid_t id=fork();
            // if(id==0)
            // {
            //     close(_listenSock);
            //     if(fork()>0)
            //     {
            //         exit(0);
            //     }
            //     service(serviceSock,srcip,srcport);
            //     exit(0);
            // }
            // close(serviceSock);
            // waitpid(id,nullptr,0);

            // version1:创建子进程
            // pid_t id=fork();
            // if(id==0)
            // {
            //     close(_listenSock);
            //     service(serviceSock,srcip,srcport);
            //     exit(0);
            // }
            // close(serviceSock);
            // //waitpid(id,nullptr,WNOHANG);
        }
    }

    ~ServerTCP()
    {}
};